From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Tue, 19 Jan 2021 05:05:53 +0000 (+0100)
Subject: Actually make the calc trail window dedicated
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~18^2~4473
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=378a01e16808ce319138141bdc0779d96e17f8bf;p=emacs.git

Actually make the calc trail window dedicated

* lisp/calc/calc.el (calc-trail-display): Actually make the trail
window dedicated (bug#45928).
---

diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el
index d684c7ba97f..ec09abb34c4 100644
--- a/lisp/calc/calc.el
+++ b/lisp/calc/calc.el
@@ -2144,7 +2144,7 @@ the United States."
                 (let ((w (split-window nil (/ (* (window-width) 2) 3) t)))
                   (set-window-buffer w calc-trail-buffer)
                   (and calc-make-windows-dedicated
-                       (set-window-dedicated-p nil t))))
+                       (set-window-dedicated-p w t))))
               (calc-wrapper
                (setq overlay-arrow-string calc-trail-overlay
                      overlay-arrow-position calc-trail-pointer)